/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Prog / Q-R / REdExamples.cpt / Examples / CExamples / ResXXXXEd.c

< prev

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 52 65 73 58 58 58 | 58 45 64 2e 63 00 00 00 |..ResXXX|XEd.c...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 17 2c 00 | 00 01 fa 9f 1a 46 00 9f |......,.|.....F..|
|00000060| 1a 46 00 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |.F......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 bb 4a 00 00 |........|.....J..|
|00000080| 2f 2a 0d 46 69 6c 65 20 | 52 65 73 58 58 58 58 45 |/*.File |ResXXXXE|
|00000090| 64 2e 63 0d 0d 43 6f 70 | 79 72 69 67 68 74 20 41 |d.c..Cop|yright A|
|000000a0| 70 70 6c 65 20 43 6f 6d | 70 75 74 65 72 2c 20 49 |pple Com|puter, I|
|000000b0| 6e 63 2e 20 31 39 38 35 | 2d 31 39 38 38 0d 41 6c |nc. 1985|-1988.Al|
|000000c0| 6c 20 72 69 67 68 74 73 | 20 72 65 73 65 72 76 65 |l rights| reserve|
|000000d0| 64 2e 0d 2a 2f 0d 0d 23 | 69 6e 63 6c 75 64 65 09 |d..*/..#|include.|
|000000e0| 3c 74 79 70 65 73 2e 68 | 3e 0d 23 69 6e 63 6c 75 |<types.h|>.#inclu|
|000000f0| 64 65 09 3c 6d 65 6d 6f | 72 79 2e 68 3e 0d 23 69 |de.<memo|ry.h>.#i|
|00000100| 6e 63 6c 75 64 65 09 3c | 6d 65 6e 75 73 2e 68 3e |nclude.<|menus.h>|
|00000110| 0d 23 69 6e 63 6c 75 64 | 65 09 3c 72 65 73 6f 75 |.#includ|e.<resou|
|00000120| 72 63 65 73 2e 68 3e 0d | 0d 23 69 6e 63 6c 75 64 |rces.h>.|.#includ|
|00000130| 65 09 22 52 65 73 45 64 | 2e 68 22 0d 0d 74 79 70 |e."ResEd|.h"..typ|
|00000140| 65 64 65 66 20 73 74 72 | 75 63 74 20 72 58 58 58 |edef str|uct rXXX|
|00000150| 58 52 65 63 20 7b 0d 09 | 50 61 72 65 6e 74 48 61 |XRec {..|ParentHa|
|00000160| 6e 64 6c 65 09 66 61 74 | 68 65 72 3b 20 09 2f 2a |ndle.fat|her; ./*|
|00000170| 09 42 61 63 6b 20 70 74 | 72 20 74 6f 20 64 61 64 |.Back pt|r to dad|
|00000180| 20 2a 2f 0d 09 73 74 72 | 36 34 09 09 09 6e 61 6d | */..str|64...nam|
|00000190| 65 3b 09 09 2f 2a 20 74 | 68 65 20 6e 61 6d 65 20 |e;../* t|he name |
|000001a0| 6f 66 20 74 68 69 73 20 | 65 64 69 74 6f 72 20 2a |of this |editor *|
|000001b0| 2f 0d 09 57 69 6e 64 6f | 77 50 74 72 09 09 77 69 |/..Windo|wPtr..wi|
|000001c0| 6e 64 50 74 72 3b 09 2f | 2a 20 54 68 69 73 20 76 |ndPtr;./|* This v|
|000001d0| 69 65 77 27 73 20 77 69 | 6e 64 6f 77 20 2a 2f 0d |iew's wi|ndow */.|
|000001e0| 09 42 6f 6f 6c 65 61 6e | 09 09 09 72 65 62 75 69 |.Boolean|...rebui|
|000001f0| 6c 64 3b 09 2f 2a 20 53 | 65 74 20 54 52 55 45 20 |ld;./* S|et TRUE |
|00000200| 69 66 20 74 68 69 6e 67 | 73 20 68 61 76 65 20 63 |if thing|s have c|
|00000210| 68 61 6e 67 65 64 20 2a | 2f 0d 09 48 61 6e 64 6c |hanged *|/..Handl|
|00000220| 65 09 09 09 68 58 58 58 | 58 3b 09 09 2f 2a 20 54 |e...hXXX|X;../* T|
|00000230| 68 65 20 72 65 73 6f 75 | 72 63 65 20 77 65 20 61 |he resou|rce we a|
|00000240| 72 65 20 77 6f 72 6b 69 | 6e 67 20 6f 6e 20 2a 2f |re worki|ng on */|
|00000250| 0d 09 4d 65 6e 75 48 61 | 6e 64 6c 65 09 09 6d 65 |..MenuHa|ndle..me|
|00000260| 6e 75 58 58 58 58 3b 09 | 2f 2a 09 6f 75 72 20 6d |nuXXXX;.|/*.our m|
|00000270| 65 6e 75 20 2a 2f 0d 7d | 20 72 58 58 58 58 52 65 |enu */.}| rXXXXRe|
|00000280| 63 3b 0d 0d 74 79 70 65 | 64 65 66 09 72 58 58 58 |c;..type|def.rXXX|
|00000290| 58 52 65 63 09 2a 72 58 | 58 58 58 50 74 72 3b 0d |XRec.*rX|XXXPtr;.|
|000002a0| 74 79 70 65 64 65 66 09 | 72 58 58 58 58 50 74 72 |typedef.|rXXXXPtr|
|000002b0| 09 2a 72 58 58 58 58 48 | 61 6e 64 6c 65 3b 0d 0d |.*rXXXXH|andle;..|
|000002c0| 70 61 73 63 61 6c 20 76 | 6f 69 64 20 44 65 62 75 |pascal v|oid Debu|
|000002d0| 67 67 65 72 28 2f 2a 76 | 6f 69 64 2a 2f 29 20 65 |gger(/*v|oid*/) e|
|000002e0| 78 74 65 72 6e 20 30 78 | 41 39 46 46 3b 0d 0d 2f |xtern 0x|A9FF;../|
|000002f0| 2a 2d 20 2d 09 2d 20 20 | 2d 20 20 2d 20 2d 20 20 |*- -.-  |-  - -  |
|00000300| 2d 20 20 2d 20 20 2d 20 | 2d 20 20 2d 20 20 2d 09 |-  -  - |-  -  -.|
|00000310| 2d 20 2d 20 20 2d 09 2d | 20 20 2d 20 2d 09 2d 20 |- -  -.-|  - -.- |
|00000320| 20 2d 20 20 2d 20 2d 20 | 20 2d 20 20 2d 2a 2f 0d | -  - - | -  -*/.|
|00000330| 0d 70 61 73 63 61 6c 20 | 76 6f 69 64 20 45 64 69 |.pascal |void Edi|
|00000340| 74 42 69 72 74 68 28 48 | 61 6e 64 6c 65 20 54 68 |tBirth(H|andle Th|
|00000350| 69 6e 67 2c 20 50 61 72 | 65 6e 74 48 61 6e 64 6c |ing, Par|entHandl|
|00000360| 65 20 44 61 64 29 0d 7b | 0d 09 72 58 58 58 58 48 |e Dad).{|..rXXXXH|
|00000370| 61 6e 64 6c 65 09 4d 79 | 58 58 58 58 3b 0d 09 57 |andle.My|XXXX;..W|
|00000380| 69 6e 64 6f 77 50 74 72 | 09 77 3b 0d 09 63 68 61 |indowPtr|.w;..cha|
|00000390| 72 09 09 73 5b 32 35 36 | 5d 3b 0d 0d 09 2f 2a 20 |r..s[256|];.../* |
|000003a0| 50 72 65 70 61 72 65 20 | 77 69 6e 64 6f 77 20 74 |Prepare |window t|
|000003b0| 69 74 6c 65 20 61 6e 64 | 20 72 65 71 75 65 73 74 |itle and| request|
|000003c0| 20 63 72 65 61 74 69 6f | 6e 20 6f 66 20 61 20 6e | creatio|n of a n|
|000003d0| 65 77 20 77 69 6e 64 6f | 77 20 2a 2f 0d 09 73 74 |ew windo|w */..st|
|000003e0| 72 63 70 79 28 73 2c 20 | 22 5c 70 57 69 6e 64 6f |rcpy(s, |"\pWindo|
|000003f0| 77 22 29 3b 0d 09 53 65 | 74 45 54 69 74 6c 65 28 |w");..Se|tETitle(|
|00000400| 28 48 61 6e 64 6c 65 29 | 54 68 69 6e 67 2c 20 73 |(Handle)|Thing, s|
|00000410| 29 3b 0d 09 43 6f 6e 63 | 61 74 53 74 72 28 73 2c |);..Conc|atStr(s,|
|00000420| 20 22 5c 70 20 66 72 6f | 6d 20 22 29 3b 0d 0d 09 | "\p fro|m ");...|
|00000430| 2f 2a 49 66 20 77 65 20 | 67 6f 74 20 61 20 6e 65 |/*If we |got a ne|
|00000440| 77 20 77 69 6e 64 6f 77 | 2c 20 74 68 65 6e 20 73 |w window|, then s|
|00000450| 74 61 72 74 20 75 70 20 | 74 68 65 20 65 64 69 74 |tart up |the edit|
|00000460| 6f 72 2a 2f 0d 09 69 66 | 20 28 77 20 3d 20 57 69 |or*/..if| (w = Wi|
|00000470| 6e 64 53 65 74 75 70 28 | 33 30 30 2c 20 31 30 30 |ndSetup(|300, 100|
|00000480| 2c 20 73 2c 20 28 2a 44 | 61 64 29 2d 3e 6e 61 6d |, s, (*D|ad)->nam|
|00000490| 65 29 29 20 7b 0d 09 09 | 46 69 78 48 61 6e 64 28 |e)) {...|FixHand(|
|000004a0| 73 69 7a 65 6f 66 28 57 | 69 6e 64 6f 77 52 65 63 |sizeof(W|indowRec|
|000004b0| 6f 72 64 29 2c 20 28 48 | 61 6e 64 6c 65 29 54 68 |ord), (H|andle)Th|
|000004c0| 69 6e 67 29 3b 20 2f 2a | 20 4d 61 6b 65 20 73 75 |ing); /*| Make su|
|000004d0| 72 65 20 77 65 20 68 61 | 76 65 0d 09 09 09 09 09 |re we ha|ve......|
|000004e0| 09 09 09 09 09 09 09 09 | 20 20 20 20 20 65 6e 6f |........|     eno|
|000004f0| 75 67 68 20 72 6f 6f 6d | 20 69 6e 20 2a 2f 0d 09 |ugh room| in */..|
|00000500| 09 2f 2a 20 74 68 65 20 | 68 61 6e 64 6c 65 20 66 |./* the |handle f|
|00000510| 6f 72 20 61 20 63 6f 6d | 70 6c 65 74 65 20 77 69 |or a com|plete wi|
|00000520| 6e 64 6f 77 09 2a 2f 0d | 09 09 2f 2a 20 72 65 63 |ndow.*/.|../* rec|
|00000530| 6f 72 64 2e 20 28 6c 61 | 74 65 72 20 74 68 69 73 |ord. (la|ter this|
|00000540| 20 77 69 6c 6c 20 62 65 | 09 09 2a 2f 0d 09 09 2f | will be|..*/.../|
|00000550| 2a 20 61 73 73 69 67 6e | 65 64 20 74 6f 20 28 2a |* assign|ed to (*|
|00000560| 4d 79 58 58 58 58 29 2d | 3e 68 58 58 58 58 09 09 |MyXXXX)-|>hXXXX..|
|00000570| 2a 2f 0d 09 09 0d 09 09 | 2f 2a 20 47 65 74 20 6d |*/......|/* Get m|
|00000580| 65 6d 6f 72 79 20 66 6f | 72 20 61 6e 64 20 68 61 |emory fo|r and ha|
|00000590| 6e 64 6c 65 20 74 6f 20 | 6f 75 72 20 69 6e 73 74 |ndle to |our inst|
|000005a0| 61 6e 63 65 20 72 65 63 | 6f 72 64 20 2a 2f 0d 09 |ance rec|ord */..|
|000005b0| 09 4d 79 58 58 58 58 20 | 3d 20 28 72 58 58 58 58 |.MyXXXX |= (rXXXX|
|000005c0| 48 61 6e 64 6c 65 29 4e | 65 77 48 61 6e 64 6c 65 |Handle)N|ewHandle|
|000005d0| 28 73 69 7a 65 6f 66 28 | 72 58 58 58 58 52 65 63 |(sizeof(|rXXXXRec|
|000005e0| 29 29 3b 20 2f 2a 20 4e | 65 65 64 20 74 6f 20 64 |)); /* N|eed to d|
|000005f0| 6f 20 73 69 7a 65 0d 09 | 09 09 09 09 09 09 09 09 |o size..|........|
|00000600| 09 09 09 09 09 09 09 63 | 68 65 63 6b 3f 20 2a 2f |.......c|heck? */|
|00000610| 0d 09 09 48 4c 6f 63 6b | 28 28 48 61 6e 64 6c 65 |...HLock|((Handle|
|00000620| 29 4d 79 58 58 58 58 29 | 3b 0d 09 09 2f 2a 20 50 |)MyXXXX)|;.../* P|
|00000630| 75 74 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 61 |ut infor|mation a|
|00000640| 62 6f 75 74 20 74 68 69 | 73 20 69 6e 63 61 72 6e |bout thi|s incarn|
|00000650| 61 74 69 6f 6e 20 6f 66 | 20 74 68 65 20 65 64 69 |ation of| the edi|
|00000660| 74 6f 72 20 61 6e 64 20 | 74 68 65 20 77 69 6e 64 |tor and |the wind|
|00000670| 6f 77 20 69 74 20 69 73 | 20 2a 2f 0d 09 09 2f 2a |ow it is| */.../*|
|00000680| 20 73 65 72 76 69 6e 67 | 20 69 6e 74 6f 20 6f 75 | serving| into ou|
|00000690| 72 20 72 65 63 6f 72 64 | 2e 28 61 6c 77 61 79 73 |r record|.(always|
|000006a0| 20 70 61 73 73 65 64 20 | 61 72 6f 75 6e 64 20 69 | passed |around i|
|000006b0| 6e 20 74 68 65 20 68 61 | 6e 64 6c 65 20 4d 79 58 |n the ha|ndle MyX|
|000006c0| 58 58 58 2e 09 09 20 2a | 2f 0d 0d 09 09 28 2a 4d |XXX... *|/....(*M|
|000006d0| 79 58 58 58 58 29 2d 3e | 77 69 6e 64 50 74 72 20 |yXXXX)->|windPtr |
|000006e0| 3d 20 77 3b 0d 09 09 28 | 2a 4d 79 58 58 58 58 29 |= w;...(|*MyXXXX)|
|000006f0| 2d 3e 66 61 74 68 65 72 | 20 3d 20 44 61 64 3b 0d |->father| = Dad;.|
|00000700| 09 09 28 2a 4d 79 58 58 | 58 58 29 2d 3e 68 58 58 |..(*MyXX|XX)->hXX|
|00000710| 58 58 20 3d 20 54 68 69 | 6e 67 3b 0d 0d 09 09 2f |XX = Thi|ng;..../|
|00000720| 2a 20 4c 65 74 20 74 68 | 65 20 6d 61 69 6e 20 70 |* Let th|e main p|
|00000730| 72 6f 67 72 61 6d 20 6b | 6e 6f 77 20 77 68 6f 20 |rogram k|now who |
|00000740| 69 73 20 74 6f 20 6d 61 | 6e 61 67 65 20 74 68 69 |is to ma|nage thi|
|00000750| 73 20 77 69 6e 64 6f 77 | 20 62 79 20 67 69 76 69 |s window| by givi|
|00000760| 6e 67 20 69 74 20 62 6f | 74 68 09 2a 2f 0d 09 09 |ng it bo|th.*/...|
|00000770| 2f 2a 20 6f 75 72 20 72 | 65 73 6f 75 72 63 65 20 |/* our r|esource |
|00000780| 49 44 20 6e 75 6d 62 65 | 72 20 61 6e 64 20 6f 75 |ID numbe|r and ou|
|00000790| 72 20 69 6e 73 74 61 6e | 63 65 20 72 65 63 6f 72 |r instan|ce recor|
|000007a0| 64 20 68 61 6e 64 6c 65 | 09 09 09 09 09 2a 2f 0d |d handle|.....*/.|
|000007b0| 09 09 28 28 57 69 6e 64 | 6f 77 50 65 65 6b 29 77 |..((Wind|owPeek)w|
|000007c0| 29 2d 3e 77 69 6e 64 6f | 77 4b 69 6e 64 20 3d 20 |)->windo|wKind = |
|000007d0| 52 65 73 45 64 49 44 28 | 29 3b 0d 09 09 28 28 57 |ResEdID(|);...((W|
|000007e0| 69 6e 64 6f 77 50 65 65 | 6b 29 77 29 2d 3e 72 65 |indowPee|k)w)->re|
|000007f0| 66 43 6f 6e 20 3d 20 28 | 6c 6f 6e 67 29 4d 79 58 |fCon = (|long)MyX|
|00000800| 58 58 58 3b 0d 0d 09 09 | 2f 2a 20 53 65 74 20 75 |XXX;....|/* Set u|
|00000810| 70 20 6d 65 6e 75 73 2c | 74 68 65 20 76 69 65 77 |p menus,|the view|
|00000820| 2c 20 65 74 63 2e 20 66 | 6f 72 20 74 68 69 73 20 |, etc. f|or this |
|00000830| 77 69 6e 64 6f 77 20 2a | 2f 0d 09 09 48 55 6e 6c |window *|/...HUnl|
|00000840| 6f 63 6b 28 28 48 61 6e | 64 6c 65 29 4d 79 58 58 |ock((Han|dle)MyXX|
|00000850| 58 58 29 3b 0d 09 7d 0d | 7d 0d 0d 2f 2a 2d 20 2d |XX);..}.|}../*- -|
|00000860| 20 20 2d 20 20 2d 09 2d | 20 2d 20 20 2d 09 2d 20 |  -  -.-| -  -.- |
|00000870| 20 2d 20 2d 09 2d 20 20 | 2d 20 20 2d 20 2d 20 20 | - -.-  |-  - -  |
|00000880| 2d 20 20 2d 20 20 2d 20 | 2d 20 20 2d 20 20 2d 09 |-  -  - |-  -  -.|
|00000890| 2d 20 2d 20 20 2d 09 2d | 2a 2f 0d 0d 70 61 73 63 |- -  -.-|*/..pasc|
|000008a0| 61 6c 20 76 6f 69 64 20 | 50 69 63 6b 42 69 72 74 |al void |PickBirt|
|000008b0| 68 28 52 65 73 54 79 70 | 65 20 74 2c 50 61 72 65 |h(ResTyp|e t,Pare|
|000008c0| 6e 74 48 61 6e 64 6c 65 | 20 44 61 64 29 0d 7b 0d |ntHandle| Dad).{.|
|000008d0| 7d 0d 2f 2a 2d 20 2d 20 | 20 2d 20 20 2d 09 2d 20 |}./*- - | -  -.- |
|000008e0| 2d 20 20 2d 09 2d 20 20 | 2d 20 2d 09 2d 20 20 2d |-  -.-  |- -.-  -|
|000008f0| 20 20 2d 20 2d 20 20 2d | 20 20 2d 20 20 2d 20 2d |  - -  -|  -  - -|
|00000900| 20 20 2d 20 20 2d 09 2d | 20 2d 20 20 2d 09 2d 2a |  -  -.-| -  -.-*|
|00000910| 2f 0d 0d 70 61 73 63 61 | 6c 20 76 6f 69 64 20 44 |/..pasca|l void D|
|00000920| 6f 45 76 65 6e 74 28 45 | 76 65 6e 74 52 65 63 6f |oEvent(E|ventReco|
|00000930| 72 64 20 2a 45 76 74 2c | 20 72 58 58 58 58 48 61 |rd *Evt,| rXXXXHa|
|00000940| 6e 64 6c 65 20 4d 79 58 | 58 58 58 29 0d 7b 0d 09 |ndle MyX|XXX).{..|
|00000950| 50 6f 69 6e 74 09 4d 6f | 75 73 65 50 6f 69 6e 74 |Point.Mo|usePoint|
|00000960| 3b 0d 0d 09 42 75 62 62 | 6c 65 55 70 28 28 48 61 |;...Bubb|leUp((Ha|
|00000970| 6e 64 6c 65 29 4d 79 58 | 58 58 58 29 3b 09 2f 2a |ndle)MyX|XXX);./*|
|00000980| 20 4d 6f 76 65 20 6f 75 | 72 20 69 74 65 6d 20 75 | Move ou|r item u|
|00000990| 70 20 69 6d 20 6d 65 6d | 6f 72 79 20 2a 2f 0d 09 |p im mem|ory */..|
|000009a0| 48 4c 6f 63 6b 28 28 48 | 61 6e 64 6c 65 29 4d 79 |HLock((H|andle)My|
|000009b0| 58 58 58 58 29 3b 09 09 | 2f 2a 20 4c 6f 63 6b 20 |XXXX);..|/* Lock |
|000009c0| 69 74 20 64 6f 77 6e 20 | 2a 2f 0d 09 2f 2a 20 48 |it down |*/../* H|
|000009d0| 61 6e 64 6c 65 20 65 76 | 65 6e 74 20 70 61 73 73 |andle ev|ent pass|
|000009e0| 65 64 20 74 6f 20 75 73 | 20 62 79 20 6d 61 69 6e |ed to us| by main|
|000009f0| 20 70 72 6f 67 72 61 6d | 09 2a 2f 0d 09 2f 2a 20 | program|.*/../* |
|00000a00| 4a 75 73 74 20 6c 69 6b | 65 20 61 20 27 72 65 61 |Just lik|e a 'rea|
|00000a10| 6c 27 20 65 76 65 6e 74 | 20 6c 6f 6f 70 2c 20 65 |l' event| loop, e|
|00000a20| 78 63 65 70 74 c9 09 09 | 2a 2f 0d 09 2f 2a 20 74 |xcept...|*/../* t|
|00000a30| 68 65 72 65 20 69 73 20 | 6e 6f 20 6c 6f 6f 70 20 |here is |no loop |
|00000a40| 61 6e 64 20 77 65 20 64 | 6f 6e 27 74 20 68 61 76 |and we d|on't hav|
|00000a50| 65 20 74 6f 09 09 2a 2f | 0d 09 2f 2a 20 68 61 6e |e to..*/|../* han|
|00000a60| 64 6c 65 20 61 73 20 6d | 75 63 68 20 62 65 63 61 |dle as m|uch beca|
|00000a70| 75 73 65 20 74 68 65 20 | 6d 61 69 6e 20 70 72 6f |use the |main pro|
|00000a80| 67 72 61 6d 09 09 2a 2f | 0d 09 2f 2a 20 77 69 6c |gram..*/|../* wil|
|00000a90| 6c 20 64 6f 20 61 6c 6c | 20 74 68 65 20 73 74 75 |l do all| the stu|
|00000aa0| 66 66 20 74 68 61 74 20 | 64 6f 65 73 6e 27 74 20 |ff that |doesn't |
|00000ab0| 61 70 70 6c 79 09 09 2a | 2f 0d 09 2f 2a 20 74 6f |apply..*|/../* to|
|00000ac0| 20 75 73 2e 09 09 09 09 | 09 09 09 09 09 09 2a 2f | us.....|......*/|
|00000ad0| 0d 09 4d 6f 75 73 65 50 | 6f 69 6e 74 20 3d 20 45 |..MouseP|oint = E|
|00000ae0| 76 74 2d 3e 77 68 65 72 | 65 3b 09 2f 2a 20 50 6f |vt->wher|e;./* Po|
|00000af0| 69 6e 74 20 61 74 20 77 | 68 69 63 68 20 74 68 65 |int at w|hich the|
|00000b00| 20 65 76 65 6e 74 20 6f | 63 63 75 72 65 64 20 2a | event o|ccured *|
|00000b10| 2f 0d 09 53 65 74 50 6f | 72 74 28 28 2a 4d 79 58 |/..SetPo|rt((*MyX|
|00000b20| 58 58 58 29 2d 3e 77 69 | 6e 64 50 74 72 29 3b 2f |XXX)->wi|ndPtr);/|
|00000b30| 2a 20 53 65 74 20 74 68 | 65 20 70 6f 72 74 20 74 |* Set th|e port t|
|00000b40| 6f 20 6f 75 72 20 77 69 | 6e 64 6f 77 20 2a 2f 0d |o our wi|ndow */.|
|00000b50| 09 47 6c 6f 62 61 6c 54 | 6f 4c 6f 63 61 6c 28 26 |.GlobalT|oLocal(&|
|00000b60| 4d 6f 75 73 65 50 6f 69 | 6e 74 29 3b 09 2f 2a 20 |MousePoi|nt);./* |
|00000b70| 43 6f 6e 76 65 72 74 20 | 65 76 65 6e 74 20 6c 6f |Convert |event lo|
|00000b80| 63 61 74 69 6f 6e 20 74 | 6f 20 6c 6f 63 61 6c 20 |cation t|o local |
|00000b90| 63 6f 6f 72 64 73 20 2a | 2f 0d 09 73 77 69 74 63 |coords *|/..switc|
|00000ba0| 68 20 28 45 76 74 2d 3e | 77 68 61 74 29 20 7b 0d |h (Evt->|what) {.|
|00000bb0| 09 09 63 61 73 65 20 6d | 6f 75 73 65 44 6f 77 6e |..case m|ouseDown|
|00000bc0| 3a 0d 09 09 09 62 72 65 | 61 6b 3b 0d 0d 09 09 63 |:....bre|ak;....c|
|00000bd0| 61 73 65 20 61 63 74 69 | 76 61 74 65 45 76 74 3a |ase acti|vateEvt:|
|00000be0| 0d 09 09 09 41 62 6c 65 | 4d 65 6e 75 28 46 69 6c |....Able|Menu(Fil|
|00000bf0| 65 4d 65 6e 75 2c 20 66 | 69 6c 65 54 6f 70 29 3b |eMenu, f|ileTop);|
|00000c00| 0d 09 09 09 69 66 20 28 | 45 76 74 2d 3e 6d 6f 64 |....if (|Evt->mod|
|00000c10| 69 66 69 65 72 73 20 26 | 20 61 63 74 69 76 65 46 |ifiers &| activeF|
|00000c20| 6c 61 67 29 20 7b 0d 09 | 09 09 09 2f 2a 20 41 63 |lag) {..|.../* Ac|
|00000c30| 74 69 76 61 74 65 20 65 | 76 65 6e 74 20 2a 2f 0d |tivate e|vent */.|
|00000c40| 09 09 09 7d 20 65 6c 73 | 65 20 7b 0d 09 09 09 09 |...} els|e {.....|
|00000c50| 2f 2a 20 44 65 61 63 74 | 69 76 61 74 65 20 65 76 |/* Deact|ivate ev|
|00000c60| 65 6e 74 20 2a 2f 0d 09 | 09 09 7d 0d 09 09 09 62 |ent */..|..}....b|
|00000c70| 72 65 61 6b 3b 0d 0d 09 | 09 63 61 73 65 20 75 70 |reak;...|.case up|
|00000c80| 64 61 74 65 45 76 74 3a | 0d 50 61 69 6e 74 52 65 |dateEvt:|.PaintRe|
|00000c90| 63 74 28 26 28 2a 4d 79 | 58 58 58 58 29 2d 3e 77 |ct(&(*My|XXXX)->w|
|00000ca0| 69 6e 64 50 74 72 2d 3e | 70 6f 72 74 52 65 63 74 |indPtr->|portRect|
|00000cb0| 29 3b 0d 09 09 09 62 72 | 65 61 6b 3b 0d 0d 09 09 |);....br|eak;....|
|00000cc0| 63 61 73 65 20 6b 65 79 | 44 6f 77 6e 3a 0d 09 09 |case key|Down:...|
|00000cd0| 09 62 72 65 61 6b 3b 0d | 0d 09 7d 0d 09 48 55 6e |.break;.|..}..HUn|
|00000ce0| 6c 6f 63 6b 28 28 48 61 | 6e 64 6c 65 29 4d 79 58 |lock((Ha|ndle)MyX|
|00000cf0| 58 58 58 29 3b 0d 7d 0d | 2f 2a 2d 20 2d 20 20 2d |XXX);.}.|/*- -  -|
|00000d00| 20 20 2d 09 2d 20 2d 20 | 20 2d 09 2d 20 20 2d 20 |  -.- - | -.-  - |
|00000d10| 2d 09 2d 20 20 2d 20 20 | 2d 20 2d 20 20 2d 20 20 |-.-  -  |- -  -  |
|00000d20| 2d 20 20 2d 20 2d 20 20 | 2d 20 20 2d 09 2d 20 2d |-  - -  |-  -.- -|
|00000d30| 20 20 2d 09 2d 2a 2f 0d | 0d 70 61 73 63 61 6c 20 |  -.-*/.|.pascal |
|00000d40| 76 6f 69 64 20 44 6f 49 | 6e 66 6f 55 70 64 61 74 |void DoI|nfoUpdat|
|00000d50| 65 28 73 68 6f 72 74 20 | 6f 6c 64 49 44 2c 20 73 |e(short |oldID, s|
|00000d60| 68 6f 72 74 20 6e 65 77 | 49 44 2c 20 72 58 58 58 |hort new|ID, rXXX|
|00000d70| 58 48 61 6e 64 6c 65 20 | 4d 79 58 58 58 58 29 0d |XHandle |MyXXXX).|
|00000d80| 7b 0d 09 63 68 61 72 09 | 73 5b 32 35 36 5d 3b 0d |{..char.|s[256];.|
|00000d90| 0d 09 2f 2a 20 53 69 6e | 63 65 20 6f 75 72 20 49 |../* Sin|ce our I|
|00000da0| 44 20 68 61 73 20 63 68 | 61 6e 67 65 64 2c 20 77 |D has ch|anged, w|
|00000db0| 65 20 6e 65 65 64 20 74 | 6f 20 63 68 61 6e 67 65 |e need t|o change|
|00000dc0| 20 6f 75 72 20 77 69 6e | 64 6f 77 20 74 69 74 6c | our win|dow titl|
|00000dd0| 65 20 2a 2f 0d 09 73 74 | 72 63 70 79 28 73 2c 20 |e */..st|rcpy(s, |
|00000de0| 22 5c 70 57 69 6e 64 6f | 77 22 29 3b 0d 09 53 65 |"\pWindo|w");..Se|
|00000df0| 74 45 54 69 74 6c 65 28 | 28 48 61 6e 64 6c 65 29 |tETitle(|(Handle)|
|00000e00| 28 2a 4d 79 58 58 58 58 | 29 2d 3e 68 58 58 58 58 |(*MyXXXX|)->hXXXX|
|00000e10| 2c 20 73 29 3b 0d 09 43 | 6f 6e 63 61 74 53 74 72 |, s);..C|oncatStr|
|00000e20| 28 73 2c 20 22 5c 70 20 | 66 72 6f 6d 20 22 29 3b |(s, "\p |from ");|
|00000e30| 0d 09 43 6f 6e 63 61 74 | 53 74 72 28 73 2c 20 28 |..Concat|Str(s, (|
|00000e40| 2a 28 28 2a 4d 79 58 58 | 58 58 29 2d 3e 66 61 74 |*((*MyXX|XX)->fat|
|00000e50| 68 65 72 29 29 2d 3e 6e | 61 6d 65 29 3b 0d 09 53 |her))->n|ame);..S|
|00000e60| 65 74 57 54 69 74 6c 65 | 28 28 2a 4d 79 58 58 58 |etWTitle|((*MyXXX|
|00000e70| 58 29 2d 3e 77 69 6e 64 | 50 74 72 2c 20 73 29 3b |X)->wind|Ptr, s);|
|00000e80| 0d 0d 09 2f 2a 20 4e 6f | 77 2c 20 6c 65 74 20 6f |.../* No|w, let o|
|00000e90| 75 72 20 66 61 74 68 65 | 72 20 6f 62 6a 65 63 74 |ur fathe|r object|
|00000ea0| 20 6b 6e 6f 77 20 74 68 | 61 74 20 6f 75 72 20 49 | know th|at our I|
|00000eb0| 44 20 68 61 73 20 62 65 | 65 6e 20 63 68 61 6e 67 |D has be|en chang|
|00000ec0| 65 64 20 2a 2f 0d 09 43 | 61 6c 6c 49 6e 66 6f 55 |ed */..C|allInfoU|
|00000ed0| 70 64 61 74 65 28 6f 6c | 64 49 44 2c 20 6e 65 77 |pdate(ol|dID, new|
|00000ee0| 49 44 2c 20 28 2a 28 28 | 2a 4d 79 58 58 58 58 29 |ID, (*((|*MyXXXX)|
|00000ef0| 2d 3e 66 61 74 68 65 72 | 29 29 2d 3e 77 69 6e 64 |->father|))->wind|
|00000f00| 2d 3e 72 65 66 43 6f 6e | 2c 0d 09 09 09 09 20 28 |->refCon|,..... (|
|00000f10| 2a 28 28 2a 4d 79 58 58 | 58 58 29 2d 3e 66 61 74 |*((*MyXX|XX)->fat|
|00000f20| 68 65 72 29 29 2d 3e 77 | 69 6e 64 2d 3e 77 69 6e |her))->w|ind->win|
|00000f30| 64 6f 77 4b 69 6e 64 29 | 3b 0d 7d 0d 2f 2a 2d 20 |dowKind)|;.}./*- |
|00000f40| 2d 20 20 2d 20 20 2d 09 | 2d 20 2d 20 20 2d 09 2d |-  -  -.|- -  -.-|
|00000f50| 20 20 2d 20 2d 09 2d 20 | 20 2d 20 20 2d 20 2d 20 |  - -.- | -  - - |
|00000f60| 20 2d 20 20 2d 20 20 2d | 20 2d 20 20 2d 20 20 2d | -  -  -| -  -  -|
|00000f70| 09 2d 20 2d 20 20 2d 09 | 2d 2a 2f 0d 0d 73 74 61 |.- -  -.|-*/..sta|
|00000f80| 74 69 63 20 76 6f 69 64 | 20 44 6f 43 6c 6f 73 65 |tic void| DoClose|
|00000f90| 28 72 58 58 58 58 48 61 | 6e 64 6c 65 20 4d 79 58 |(rXXXXHa|ndle MyX|
|00000fa0| 58 58 58 29 0d 7b 0d 09 | 43 6c 6f 73 65 57 69 6e |XXX).{..|CloseWin|
|00000fb0| 64 6f 77 28 28 2a 4d 79 | 58 58 58 58 29 2d 3e 77 |dow((*My|XXXX)->w|
|00000fc0| 69 6e 64 50 74 72 29 3b | 09 2f 2a 20 43 6c 6f 73 |indPtr);|./* Clos|
|00000fd0| 65 20 74 68 65 20 77 69 | 6e 64 6f 77 20 2a 2f 0d |e the wi|ndow */.|
|00000fe0| 09 57 69 6e 64 46 72 65 | 65 28 28 2a 4d 79 58 58 |.WindFre|e((*MyXX|
|00000ff0| 58 58 29 2d 3e 77 69 6e | 64 50 74 72 29 3b 09 09 |XX)->win|dPtr);..|
|00001000| 2f 2a 20 4d 61 72 6b 20 | 74 68 65 20 77 69 6e 64 |/* Mark |the wind|
|00001010| 6f 77 20 72 65 63 6f 72 | 64 20 61 73 20 62 65 69 |ow recor|d as bei|
|00001020| 6e 67 20 61 76 61 69 6c | 61 62 6c 65 20 2a 2f 0d |ng avail|able */.|
|00001030| 09 49 6e 69 74 43 75 72 | 73 6f 72 28 29 3b 09 09 |.InitCur|sor();..|
|00001040| 09 09 09 09 2f 2a 20 4d | 61 6b 65 20 73 75 72 65 |..../* M|ake sure|
|00001050| 20 74 68 65 20 63 75 72 | 73 6f 72 20 69 73 20 74 | the cur|sor is t|
|00001060| 68 65 20 61 72 72 6f 77 | 20 63 75 72 73 6f 72 20 |he arrow| cursor |
|00001070| 2a 2f 0d 09 2f 2a 20 44 | 65 6c 65 74 65 20 61 6e |*/../* D|elete an|
|00001080| 79 20 6d 65 6e 75 73 20 | 74 68 61 74 20 77 65 20 |y menus |that we |
|00001090| 61 64 64 65 64 20 61 6e | 64 20 72 65 64 72 61 77 |added an|d redraw|
|000010a0| 20 6d 65 6e 75 20 62 61 | 72 09 2a 2f 0d 09 2f 2a | menu ba|r.*/../*|
|000010b0| 20 42 65 20 73 75 72 65 | 20 74 6f 20 64 69 73 70 | Be sure| to disp|
|000010c0| 6f 73 65 20 6f 66 20 61 | 6e 79 20 68 61 6e 64 6c |ose of a|ny handl|
|000010d0| 65 73 20 79 6f 75 20 61 | 72 65 20 64 6f 6e 65 20 |es you a|re done |
|000010e0| 77 69 74 68 09 2a 2f 0d | 09 44 69 73 70 6f 73 48 |with.*/.|.DisposH|
|000010f0| 61 6e 64 6c 65 28 28 48 | 61 6e 64 6c 65 29 4d 79 |andle((H|andle)My|
|00001100| 58 58 58 58 29 3b 0d 7d | 0d 0d 70 61 73 63 61 6c |XXXX);.}|..pascal|
|00001110| 20 76 6f 69 64 20 44 6f | 4d 65 6e 75 28 73 68 6f | void Do|Menu(sho|
|00001120| 72 74 20 4d 65 6e 75 2c | 20 73 68 6f 72 74 20 49 |rt Menu,| short I|
|00001130| 74 65 6d 2c 20 72 58 58 | 58 58 48 61 6e 64 6c 65 |tem, rXX|XXHandle|
|00001140| 20 4d 79 58 58 58 58 29 | 0d 7b 0d 09 73 68 6f 72 | MyXXXX)|.{..shor|
|00001150| 74 09 73 61 76 65 52 65 | 66 4e 75 6d 3b 0d 0d 09 |t.saveRe|fNum;...|
|00001160| 42 75 62 62 6c 65 55 70 | 28 28 48 61 6e 64 6c 65 |BubbleUp|((Handle|
|00001170| 29 4d 79 58 58 58 58 29 | 3b 0d 09 48 4c 6f 63 6b |)MyXXXX)|;..HLock|
|00001180| 28 28 48 61 6e 64 6c 65 | 29 4d 79 58 58 58 58 29 |((Handle|)MyXXXX)|
|00001190| 3b 0d 09 53 65 74 50 6f | 72 74 28 28 2a 4d 79 58 |;..SetPo|rt((*MyX|
|000011a0| 58 58 58 29 2d 3e 77 69 | 6e 64 50 74 72 29 3b 09 |XXX)->wi|ndPtr);.|
|000011b0| 09 2f 2a 20 53 65 74 20 | 74 68 65 20 70 6f 72 74 |./* Set |the port|
|000011c0| 20 74 6f 20 6f 75 72 20 | 77 69 6e 64 6f 77 20 2a | to our |window *|
|000011d0| 2f 0d 0d 09 2f 2a 20 41 | 67 61 69 6e 2c 20 77 65 |/.../* A|gain, we|
|000011e0| 20 68 61 6e 64 6c 65 20 | 74 68 65 20 6d 65 6e 75 | handle |the menu|
|000011f0| 20 73 74 75 66 66 20 6a | 75 73 74 20 61 73 20 77 | stuff j|ust as w|
|00001200| 65 20 77 6f 75 6c 64 20 | 69 6e 20 61 20 27 72 65 |e would |in a 're|
|00001210| 61 6c 27 20 61 70 70 6c | 69 63 61 74 69 6f 6e 09 |al' appl|ication.|
|00001220| 2a 2f 0d 09 2f 2a 20 65 | 78 63 65 70 74 20 74 68 |*/../* e|xcept th|
|00001230| 61 74 20 77 65 20 6f 6e | 6c 79 20 68 61 76 65 20 |at we on|ly have |
|00001240| 74 6f 20 68 61 6e 64 6c | 65 20 74 68 6f 73 65 20 |to handl|e those |
|00001250| 69 74 65 6d 73 20 74 68 | 61 74 20 61 70 70 6c 79 |items th|at apply|
|00001260| 20 74 6f 20 6f 75 72 73 | 65 6c 76 65 73 2e 09 2a | to ours|elves..*|
|00001270| 2f 0d 09 73 77 69 74 63 | 68 20 28 4d 65 6e 75 29 |/..switc|h (Menu)|
|00001280| 20 7b 0d 09 09 63 61 73 | 65 20 46 69 6c 65 4d 65 | {...cas|e FileMe|
|00001290| 6e 75 3a 0d 09 09 09 73 | 77 69 74 63 68 20 28 49 |nu:....s|witch (I|
|000012a0| 74 65 6d 29 20 7b 0d 09 | 09 09 09 63 61 73 65 20 |tem) {..|...case |
|000012b0| 43 6c 6f 73 65 49 74 65 | 6d 3a 0d 09 09 09 09 09 |CloseIte|m:......|
|000012c0| 44 6f 43 6c 6f 73 65 28 | 4d 79 58 58 58 58 29 3b |DoClose(|MyXXXX);|
|000012d0| 09 2f 2a 20 43 6c 6f 73 | 65 20 6f 75 72 20 77 69 |./* Clos|e our wi|
|000012e0| 6e 64 6f 77 20 2a 2f 0d | 09 09 09 09 09 72 65 74 |ndow */.|.....ret|
|000012f0| 75 72 6e 3b 09 09 09 09 | 2f 2a 20 52 65 74 75 72 |urn;....|/* Retur|
|00001300| 6e 20 74 6f 20 6d 61 69 | 6e 20 70 72 6f 67 72 61 |n to mai|n progra|
|00001310| 6d 20 2a 2f 0d 09 09 09 | 09 09 62 72 65 61 6b 3b |m */....|..break;|
|00001320| 0d 09 09 0d 09 09 09 09 | 63 61 73 65 20 52 65 76 |........|case Rev|
|00001330| 65 72 74 49 74 65 6d 3a | 0d 09 09 09 09 09 2f 2a |ertItem:|....../*|
|00001340| 20 54 68 65 20 61 72 65 | 61 20 75 6e 64 65 72 20 | The are|a under |
|00001350| 77 69 6e 64 6f 77 20 77 | 69 6c 6c 20 6e 65 65 64 |window w|ill need|
|00001360| 20 74 6f 20 62 65 20 75 | 70 64 61 74 65 64 20 2a | to be u|pdated *|
|00001370| 2f 0d 09 09 09 09 09 49 | 6e 76 61 6c 52 65 63 74 |/......I|nvalRect|
|00001380| 28 26 28 2a 4d 79 58 58 | 58 58 29 2d 3e 77 69 6e |(&(*MyXX|XX)->win|
|00001390| 64 50 74 72 2d 3e 70 6f | 72 74 52 65 63 74 29 3b |dPtr->po|rtRect);|
|000013a0| 0d 09 09 09 09 09 0d 09 | 09 09 09 09 2f 2a 20 57 |........|..../* W|
|000013b0| 65 20 77 69 6c 6c 20 6e | 65 65 64 20 74 6f 20 72 |e will n|eed to r|
|000013c0| 65 73 74 6f 72 65 20 74 | 68 65 20 63 75 72 20 72 |estore t|he cur r|
|000013d0| 65 73 6f 75 72 63 65 20 | 66 69 6c 65 09 2a 2f 0d |esource |file.*/.|
|000013e0| 09 09 09 09 09 2f 2a 20 | 72 65 66 65 72 65 6e 63 |...../* |referenc|
|000013f0| 65 20 6e 75 6d 62 65 72 | 20 77 68 65 6e 20 77 65 |e number| when we|
|00001400| 20 61 72 65 20 64 6f 6e | 65 20 68 65 72 65 2e 09 | are don|e here..|
|00001410| 09 09 2a 2f 0d 09 09 09 | 09 09 73 61 76 65 52 65 |..*/....|..saveRe|
|00001420| 66 4e 75 6d 20 3d 20 43 | 75 72 72 65 6e 74 52 65 |fNum = C|urrentRe|
|00001430| 73 28 29 3b 0d 09 09 09 | 09 09 0d 09 09 09 09 09 |s();....|........|
|00001440| 2f 2a 20 57 65 20 61 72 | 65 20 67 6f 69 6e 67 20 |/* We ar|e going |
|00001450| 74 6f 20 62 65 20 75 73 | 69 6e 67 20 74 68 65 20 |to be us|ing the |
|00001460| 72 65 73 6f 75 72 63 65 | 20 66 69 6c 65 20 77 65 |resource| file we|
|00001470| 09 2a 2f 0d 09 09 09 09 | 09 2f 2a 20 63 61 6d 65 |.*/.....|./* came|
|00001480| 20 66 72 6f 6d 2e 09 09 | 09 09 09 09 09 09 09 09 | from...|........|
|00001490| 2a 2f 0d 09 09 09 09 09 | 55 73 65 52 65 73 46 69 |*/......|UseResFi|
|000014a0| 6c 65 28 48 6f 6d 65 52 | 65 73 46 69 6c 65 28 28 |le(HomeR|esFile((|
|000014b0| 48 61 6e 64 6c 65 29 28 | 2a 4d 79 58 58 58 58 29 |Handle)(|*MyXXXX)|
|000014c0| 2d 3e 68 58 58 58 58 29 | 29 3b 0d 09 09 09 09 09 |->hXXXX)|);......|
|000014d0| 0d 09 09 09 09 09 2f 2a | 20 52 65 61 64 20 69 6e |....../*| Read in|
|000014e0| 20 74 68 65 20 6f 6c 64 | 20 63 6f 70 79 20 66 72 | the old| copy fr|
|000014f0| 6f 6d 20 64 69 73 6b 20 | 28 73 65 65 20 64 6f 63 |om disk |(see doc|
|00001500| 75 6d 65 6e 74 61 74 69 | 6f 6e 2a 2f 0d 09 09 09 |umentati|on*/....|
|00001510| 09 09 2f 2a 20 66 6f 72 | 20 72 65 76 65 72 74 52 |../* for| revertR|
|00001520| 65 73 6f 75 72 63 65 29 | 2e 20 20 43 6c 65 61 72 |esource)|.  Clear|
|00001530| 20 69 74 20 6f 75 74 20 | 75 6e 6c 65 73 73 20 74 | it out |unless t|
|00001540| 68 69 73 09 2a 2f 0d 09 | 09 09 09 09 2f 2a 20 77 |his.*/..|..../* w|
|00001550| 61 73 20 61 20 6e 65 77 | 6c 79 20 63 72 65 61 74 |as a new|ly creat|
|00001560| 65 64 20 72 65 73 6f 75 | 72 63 65 2c 20 69 6e 20 |ed resou|rce, in |
|00001570| 77 68 69 63 68 20 63 61 | 73 65 09 09 2a 2f 0d 09 |which ca|se..*/..|
|00001580| 09 09 09 09 2f 2a 20 64 | 6f 6e 27 74 2e 09 09 09 |..../* d|on't....|
|00001590| 09 09 09 09 09 09 09 09 | 2a 2f 0d 09 09 09 09 09 |........|*/......|
|000015a0| 69 66 20 28 21 52 65 76 | 65 72 74 52 65 73 6f 75 |if (!Rev|ertResou|
|000015b0| 72 63 65 28 28 48 61 6e | 64 6c 65 29 28 2a 4d 79 |rce((Han|dle)(*My|
|000015c0| 58 58 58 58 29 2d 3e 68 | 58 58 58 58 29 29 20 7b |XXXX)->h|XXXX)) {|
|000015d0| 0d 09 09 09 09 09 09 52 | 6d 76 65 52 65 73 6f 75 |.......R|mveResou|
|000015e0| 72 63 65 28 28 48 61 6e | 64 6c 65 29 28 2a 4d 79 |rce((Han|dle)(*My|
|000015f0| 58 58 58 58 29 2d 3e 68 | 58 58 58 58 29 3b 0d 09 |XXXX)->h|XXXX);..|
|00001600| 09 09 09 09 09 28 2a 28 | 28 2a 4d 79 58 58 58 58 |.....(*(|(*MyXXXX|
|00001610| 29 2d 3e 66 61 74 68 65 | 72 29 29 2d 3e 72 65 62 |)->fathe|r))->reb|
|00001620| 75 69 6c 64 20 3d 20 74 | 72 75 65 3b 0d 09 09 09 |uild = t|rue;....|
|00001630| 09 09 09 44 6f 43 6c 6f | 73 65 3b 0d 09 09 09 09 |...DoClo|se;.....|
|00001640| 09 09 72 65 74 75 72 6e | 3b 0d 09 09 09 09 09 7d |..return|;......}|
|00001650| 0d 09 09 09 09 09 2f 2a | 20 47 6f 20 62 61 63 6b |....../*| Go back|
|00001660| 20 74 6f 20 75 73 69 6e | 67 20 6f 6c 64 20 72 65 | to usin|g old re|
|00001670| 73 6f 75 72 63 65 20 66 | 69 6c 65 2e 20 2a 2f 0d |source f|ile. */.|
|00001680| 09 09 09 09 09 55 73 65 | 52 65 73 46 69 6c 65 28 |.....Use|ResFile(|
|00001690| 73 61 76 65 52 65 66 4e | 75 6d 29 3b 0d 09 09 09 |saveRefN|um);....|
|000016a0| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 09 0d 09 |..break;|........|
|000016b0| 09 09 09 63 61 73 65 20 | 47 65 74 49 6e 66 6f 49 |...case |GetInfoI|
|000016c0| 74 65 6d 3a 0d 09 09 09 | 09 09 53 68 6f 77 49 6e |tem:....|..ShowIn|
|000016d0| 66 6f 28 28 48 61 6e 64 | 6c 65 29 28 2a 4d 79 58 |fo((Hand|le)(*MyX|
|000016e0| 58 58 58 29 2d 3e 68 58 | 58 58 58 2c 20 28 50 61 |XXX)->hX|XXX, (Pa|
|000016f0| 72 65 6e 74 48 61 6e 64 | 6c 65 29 4d 79 58 58 58 |rentHand|le)MyXXX|
|00001700| 58 29 3b 0d 09 09 09 09 | 09 62 72 65 61 6b 3b 0d |X);.....|.break;.|
|00001710| 09 09 09 7d 0d 0d 09 09 | 63 61 73 65 20 45 64 69 |...}....|case Edi|
|00001720| 74 4d 65 6e 75 3a 0d 09 | 09 09 73 77 69 74 63 68 |tMenu:..|..switch|
|00001730| 20 28 49 74 65 6d 29 20 | 7b 0d 09 09 09 09 63 61 | (Item) |{.....ca|
|00001740| 73 65 20 43 75 74 49 74 | 65 6d 3a 09 62 72 65 61 |se CutIt|em:.brea|
|00001750| 6b 3b 0d 09 09 09 09 63 | 61 73 65 20 43 6f 70 79 |k;.....c|ase Copy|
|00001760| 49 74 65 6d 3a 09 62 72 | 65 61 6b 3b 0d 09 09 09 |Item:.br|eak;....|
|00001770| 09 63 61 73 65 20 50 61 | 73 74 65 49 74 65 6d 3a |.case Pa|steItem:|
|00001780| 09 62 72 65 61 6b 3b 0d | 09 09 09 09 63 61 73 65 |.break;.|....case|
|00001790| 20 43 6c 65 61 72 49 74 | 65 6d 3a 09 62 72 65 61 | ClearIt|em:.brea|
|000017a0| 6b 3b 0d 09 09 09 7d 0d | 09 7d 0d 7d 00 00 00 00 |k;....}.|.}.}....|
|000017b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000017f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001800| 00 00 01 00 00 00 01 bc | 00 00 00 bc 00 00 00 3e |........|.......>|
|00001810| 28 73 61 76 65 52 65 66 | 4e 75 6d 29 3b 0d 09 09 |(saveRef|Num);...|
|00001820| 09 09 20 20 45 4e 44 3b | 20 7b 52 65 76 65 72 74 |..  END;| {Revert|
|00001830| 0b 52 65 73 58 58 58 58 | 45 64 2e 63 02 00 00 00 |.ResXXXX|Ed.c....|
|00001840| 54 45 58 54 4d 50 53 20 | 01 06 00 40 00 80 00 00 |TEXTMPS |...@....|
|00001850| 00 00 54 45 58 54 4d 50 | 53 20 01 06 00 40 00 80 |..TEXTMP|S ...@..|
|00001860| 00 00 65 64 00 00 00 00 | 00 00 00 00 00 00 00 00 |..ed....|........|
|00001870| 00 00 9f 1a 0d c0 00 00 | 17 2c 00 00 01 fa 4d 79 |........|.,....My|
|00001880| 58 58 58 58 29 29 3b 0d | 09 09 09 09 20 20 45 4e |XXXX));.|....  EN|
|00001890| 44 3b 20 7b 47 65 74 49 | 6e 66 6f 49 74 65 6d 7d |D; {GetI|nfoItem}|
|000018a0| 0d 09 09 09 20 20 45 4e | 44 3b 20 7b 46 69 6c 65 |....  EN|D; {File|
|000018b0| 4d 65 6e 75 3a 20 43 41 | 53 45 20 49 74 65 6d 20 |Menu: CA|SE Item |
|000018c0| 4f 46 7d 0d 09 09 09 45 | 64 69 74 4d 65 6e 75 3a |OF}....E|ditMenu:|
|000018d0| 0d 09 09 09 20 20 43 41 | 53 45 20 49 74 65 6d 20 |....  CA|SE Item |
|000018e0| 4f 46 0d 09 09 09 09 43 | 75 74 49 74 65 6d 3a 20 |OF.....C|utItem: |
|000018f0| 20 20 3b 0d 09 09 09 09 | 43 6f 70 79 49 74 65 6d |  ;.....|CopyItem|
|00001900| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00001910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001920| 00 00 00 00 00 00 00 06 | 00 04 00 31 00 0a 01 49 |........|...1...I|
|00001930| 01 ea 00 31 00 0a 01 49 | 01 ea 9e 86 72 a4 00 00 |...1...I|....r...|
|00001940| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 00 6c |........|.......l|
|00001950| 00 06 00 00 02 bd 00 00 | 02 c6 09 45 64 69 74 42 |........|...EditB|
|00001960| 69 72 74 68 00 00 08 28 | 00 00 08 31 09 50 69 63 |irth...(|...1.Pic|
|00001970| 6b 42 69 72 74 68 00 00 | 08 9f 00 00 08 a6 07 44 |kBirth..|.......D|
|00001980| 6f 45 76 65 6e 74 00 00 | 0c c5 00 00 0c d1 0d 44 |oEvent..|.......D|
|00001990| 6f 49 6e 66 6f 55 70 64 | 61 74 65 00 00 00 0f 09 |oInfoUpd|ate.....|
|000019a0| 00 00 0f 10 07 44 6f 43 | 6c 6f 73 65 00 00 10 96 |.....DoC|lose....|
|000019b0| 00 00 10 9c 07 44 6f 4d | 65 6e 75 00 00 00 01 00 |.....DoM|enu.....|
|000019c0| 00 00 01 bc 00 00 00 bc | 00 00 00 3e 00 27 cc 60 |........|...>.'.`|
|000019d0| 0a a8 00 00 00 1c 00 3e | 00 00 4d 50 53 52 00 01 |.......>|..MPSR..|
|000019e0| 00 0a 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 ef |........|........|
|000019f0| ff ff 00 00 00 4c 00 28 | ee cc 00 00 00 00 00 00 |.....L.(|........|
+--------+-------------------------+-------------------------+--------+--------+